home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / dos / pascal / gwedit.com / KEYCODES.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1989-03-16  |  5.5 KB  |  176 lines
  1. {standard keyboard definition interface}
  2. {released to public domain 03/15/89 by author Michael Day}
  3.  
  4. unit keycodes;
  5. interface
  6.  
  7. const
  8.    BreakKey    = #0;
  9.    RetKey      = #13;
  10.    EscKey      = #27;
  11.    BackSpace   = #8;
  12.    GwRub       = #127;  {Editor control characters}
  13.    GwRestore   = ^R;
  14.    GwLeft      = ^S;
  15.    GwRight     = ^D;
  16.    GwWordLeft  = ^A;
  17.    GwWordRight = ^F;
  18.    GwDelChar   = ^G;
  19.    GwDelWord   = ^T;
  20.    GwDelLine   = ^Y;
  21.  
  22.    Alt9       = #128;{#0+#128;}
  23.    Alt0       = #129;{#1+#128;}
  24.    Ctrl1      = #130;{#2+#128;}
  25.    Ctrl2      = #131;{#3+#128;}
  26.    Ctrl3      = #132;{#4+#128;}    {also CtrlPgUp}
  27.    Ctrl4      = #133;{#5+#128;}
  28.    Ctrl5      = #134;{#6+#128;}
  29.    Ctrl6      = #135;{#7+#128;}
  30.    Ctrl7      = #136;{#8+#128;}
  31.    Ctrl8      = #137;{#9+#128;}
  32.    Ctrl9      = #138;{#10+#128;}
  33.    Ctrl0      = #139;{#11+#128;}
  34.    CtrlMinus  = #140;{#12+#128;}
  35.    CtrlPlus   = #141;{#13+#128;}
  36.    CtrlBkSp   = #142;{#14+#128;}
  37.  
  38.    ShiftTab   = #143;{#15+#128;}
  39.    AltQKey    = #144;{#16+#128;}
  40.    AltWKey    = #145;{#17+#128;}
  41.    AltEKey    = #146;{#18+#128;}
  42.    AltRKey    = #147;{#19+#128;}
  43.    AltTKey    = #148;{#20+#128;}
  44.    AltYKey    = #149;{#21+#128;}
  45.    AltUKey    = #150;{#22+#128;}
  46.    AltIKey    = #151;{#23+#128;}
  47.    AltOKey    = #152;{#24+#128;}
  48.    AltPKey    = #153;{#25+#128;}
  49.    AltLBrace  = #154;{#26+#128;}
  50.    AltRBrace  = #155;{#27+#128;}
  51.    {altret}          {#28+#128;}
  52.    {ctrlkey}         {#29+#128;}
  53.  
  54.    AltAKey    = #158;{#30+#128;}
  55.    AltSKey    = #159;{#31+#128;}
  56.    AltDKey    = #160;{#32+#128;}
  57.    AltFKey    = #161;{#33+#128;}
  58.    AltGKey    = #162;{#34+#128;}
  59.    AltHKey    = #163;{#35+#128;}
  60.    AltJKey    = #164;{#36+#128;}
  61.    AltKKey    = #165;{#37+#128;}
  62.    AltLKey    = #166;{#38+#128;}
  63.    AltColon   = #167;{#39+#128;}
  64.    AltQuote   = #168;{#40+#128;}
  65.    AltTilda   = #169;{#41+#128;}
  66.    {leftshft}        {#42+#128;}
  67.  
  68.    AltBSlash  = #171;{#43+#128;}
  69.    AltZKey    = #172;{#44+#128;}
  70.    AltXKey    = #173;{#45+#128;}
  71.    AltCKey    = #174;{#46+#128;}
  72.    AltVKey    = #175;{#47+#128;}
  73.    AltBKey    = #176;{#48+#128;}
  74.    AltNKey    = #177;{#49+#128;}
  75.    AltMKey    = #178;{#50+#128;}
  76.    AltComma   = #179;{#51+#128;}
  77.    AltPeriod  = #180;{#52+#128;}
  78.    AltSlash   = #181;{#53+#128;}
  79.    {rightshft}       {#54+#128;}
  80.    PrtScrn    = #183;{#55+#128;}
  81.    {altkey}          {#56+#128;}
  82.    AltSpace   = #185;{#57+#128;}
  83.    {capslock}        {#58+#128;}
  84.  
  85.    F1Key      = #187;{#59+#128;}
  86.    F2Key      = #188;{#60+#128;}
  87.    F3Key      = #189;{#61+#128;}
  88.    F4Key      = #190;{#62+#128;}
  89.    F5Key      = #191;{#63+#128;}
  90.    F6Key      = #192;{#64+#128;}
  91.    F7Key      = #193;{#65+#128;}
  92.    F8Key      = #194;{#66+#128;}
  93.    F9Key      = #195;{#67+#128;}
  94.    F10Key     = #196;{#68+#128;}
  95.  
  96.    {numlock}         {#69+#128;}
  97.    {scrllock}        {#70+#128;}
  98.    HomeKey    = #199;{#71+#128;}
  99.    UpArrow    = #200;{#72+#128;}
  100.    PgUpKey    = #201;{#73+#128;}
  101.    {keypadminus}     {#74+#128;}
  102.    LeftArrow  = #203;{#75+#128;}
  103.    {keypadfive}      {#76+#128;}
  104.    RightArrow = #205;{#77+#128;}
  105.    {keypadplus}      {#78+#128;}
  106.    EndKey     = #207;{#79+#128;}
  107.    DownArrow  = #208;{#80+#128;}
  108.    PgDnKey    = #209;{#81+#128;}
  109.    InsKey     = #210;{#82+#128;}
  110.    DelKey     = #211;{#83+#128;}
  111.  
  112.    ShiftF1Key = #212;{#84+#128;}
  113.    ShiftF2Key = #213;{#85+#128;}
  114.    ShiftF3Key = #214;{#86+#128;}
  115.    ShiftF4Key = #215;{#87+#128;}
  116.    ShiftF5Key = #216;{#88+#128;}
  117.    ShiftF6Key = #217;{#89+#128;}
  118.    ShiftF7Key = #218;{#90+#128;}
  119.    ShiftF8Key = #219;{#91+#128;}
  120.    ShiftF9Key = #220;{#92+#128;}
  121.    ShiftF10Key = #221;{#93+#128;}
  122.    CtrlF1Key  = #222;{#94+#128;}
  123.    CtrlF2Key  = #223;{#95+#128;}
  124.    CtrlF3Key  = #224;{#96+#128;}
  125.    CtrlF4Key  = #225;{#97+#128;}
  126.    CtrlF5Key  = #226;{#98+#128;}
  127.    CtrlF6Key  = #227;{#99+#128;}
  128.    CtrlF7Key  = #228;{#100+#128;}
  129.    CtrlF8Key  = #229;{#101+#128;}
  130.    CtrlF9Key  = #230;{#102+#128;}
  131.    CtrlF10Key = #231;{#103+#128;}
  132.    AltF1Key   = #232;{#104+#128;}
  133.    AltF2Key   = #233;{#105+#128;}
  134.    AltF3Key   = #234;{#106+#128;}
  135.    AltF4Key   = #235;{#107+#128;}
  136.    AltF5Key   = #236;{#108+#128;}
  137.    AltF6Key   = #237;{#109+#128;}
  138.    AltF7Key   = #238;{#110+#128;}
  139.    AltF8Key   = #239;{#111+#128;}
  140.    AltF9Key   = #240;{#112+#128;}
  141.    AltF10Key  = #241;{#113+#128;}
  142.  
  143.    CtrlPrtSc  = #242;{#114+#128;}
  144.    CtrlLeft   = #243;{#115+#128;}
  145.    CtrlRight  = #244;{#116+#128;}
  146.    CtrlEnd    = #245;{#117+#128;}
  147.    CtrlPgDown = #246;{#118+#128;}
  148.    CtrlHome   = #247;{#119+#128;}
  149.  
  150.    Alt1       = #248;{#120+#128;}
  151.    Alt2       = #249;{#121+#128;}
  152.    Alt3       = #250;{#122+#128;}  {Note: these are used by the mouse}
  153.    Alt4       = #251;{#123+#128;}  {see below}
  154.    Alt5       = #252;{#124+#128;}
  155.    Alt6       = #253;{#125+#128;}
  156.    Alt7       = #254;{#126+#128;}
  157.    Alt8       = #255;{#127+#128;}
  158.  
  159.  
  160.    RLCMouse   = #249;{#121+#128;}  {Mouse center+left+right click}
  161.    RCMouse    = #250;{#122+#128;}  {Mouse center+right click}
  162.    LCMouse    = #251;{#123+#128;}  {Mouse center+left click}
  163.    CenterMouse = #252;{#124+#128;} {Mouse center click}
  164.    LRMouse    = #253;{#125+#128;}  {Mouse left+right click}
  165.    RightMouse = #254;{#126+#128;}  {Mouse right click}
  166.    LeftMouse  = #255;{#127+#128;}  {Mouse left click}
  167.                                    {these are created by negating}
  168.                                    {the mouse button value}
  169.  
  170.  
  171. implementation
  172.  
  173. end.
  174.  
  175.  
  176.